home *** CD-ROM | disk | FTP | other *** search
/ Glasklar Interactive Technology / Glasklar Interactive Technology - Disc 1.iso / Technik / BS020.dxr / Verhalten_5_Themen_000.ls < prev    next >
Encoding:
Text File  |  2000-09-15  |  498 b   |  16 lines
  1. global gMarker, nThema, gThema_0, gThema_1, gThema_2, gThema_3, vbThema_1, vbThema_2, vbThema_3, vbThema_i, gHaupttext, NaviList
  2.  
  3. on exitFrame
  4.   set vbThema_1 to "Aircraft"
  5.   set vbThema_2 to "Ships"
  6.   set vbThema_i to "Online glossary"
  7.   set gMarker to "BM020"
  8.   setProp(NaviList, gMarker, 1)
  9.   set nThema to gThema_1
  10.   set gHaupttext to the member of sprite 17
  11.   set the scrollTop of member gHaupttext to 0
  12.   set the visible of sprite 4 to 0
  13.   set the visible of sprite 5 to 1
  14.   sethistory()
  15. end
  16.